makebgreatagain

^!k::
s := "0" ; 00

n := DllCall("msvcrt\" (A_IsUnicode ? "wcstoul" : "strtoul"), Str, s, UInt, 0, Int, 2)
l := DllCall("ws2_32\ntohl", UInt, n)

VarSetCapacity(data, 1, 0)
NumPut(l, data, 0, "UInt")

file := FileOpen("C:\Users\Administrator\Desktop\beautiful.png", "a", "cp0")
file.RawWrite(&data, 1)
file.Close()
Return